home *** CD-ROM | disk | FTP | other *** search
/ El Mac 9 / El Mac 9.iso / Shareware / Applications / Charting Coach v1.5 / Charting Coach v1.dxr / 00281.ls < prev    next >
Encoding:
Text File  |  1996-04-08  |  1.4 KB  |  47 lines
  1. on mouseUp
  2.   global firstMonthlyDay
  3.   set y to the mouseH
  4.   if the castNum of sprite 11 = the number of member "nob" then
  5.     if (y > 191) and (y < 207) then
  6.       cursor(4)
  7.       if firstMonthlyDay > 1 then
  8.         set firstMonthlyDay to firstMonthlyDay - 1
  9.         resetMonthlyDays()
  10.       end if
  11.     else
  12.       if (y > 500) and (y < 517) then
  13.         cursor(4)
  14.         if (firstMonthlyDay + 11) < count(stamp) then
  15.           set firstMonthlyDay to firstMonthlyDay + 1
  16.           resetMonthlyDays()
  17.         end if
  18.       else
  19.         if (y > 207) and (y < 500) then
  20.           if y > the locH of sprite 11 then
  21.             if (firstMonthlyDay + 12) < count(stamp) then
  22.               set firstMonthlyDay to firstMonthlyDay + 2
  23.               resetMonthlyDays()
  24.             else
  25.               if (firstMonthlyDay + 11) < count(stamp) then
  26.                 set firstMonthlyDay to firstMonthlyDay + 1
  27.               end if
  28.               resetMonthlyDays()
  29.             end if
  30.           else
  31.             if (firstMonthlyDay - 1) > 1 then
  32.               set firstMonthlyDay to firstMonthlyDay - 2
  33.               resetMonthlyDays()
  34.             else
  35.               if firstMonthlyDay > 1 then
  36.                 set firstMonthlyDay to firstMonthlyDay - 1
  37.               end if
  38.               resetMonthlyDays()
  39.             end if
  40.           end if
  41.         end if
  42.       end if
  43.     end if
  44.   end if
  45.   cursor(0)
  46. end
  47.